home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
CD Fun House 1
/
CD Fun House (Wayzata Technology).iso
/
•The Arcade•
/
Spacestation Pheta 2.0 •••••
/
Spacestation Pheta
/
Spacestation Pheta.rsrc
/
CODE_5.txt
< prev
next >
Wrap
Text File
|
1990-09-16
|
33KB
|
589 lines
# near model CODE resource
# jump table entries: 816-816 (1 of them)
fn00000000:
00000000 4E56 FEEE link A6, -0x0112
00000004 2F07 move.l -[A7], D7
00000006 2F2E 000E move.l -[A7], [A6 + 0xE]
0000000A 3F3C 0001 move.w -[A7], 0x1
0000000E 3F2E 000C move.w -[A7], [A6 + 0xC]
00000012 4EAD 025A jsr [A5 + 0x25A /* export_71 */]
00000016 206E 0008 movea.l A0, [A6 + 0x8]
0000001A 3028 000C move.w D0, [A0 + 0xC]
0000001E 6052 bra +0x54 /* 00000072 */
label00000020:
00000020 3F3C 000A move.w -[A7], 0xA /* '\n' */
00000024 A88A syscall TextSize
00000026 1D7C 0001 FFEC move.b [A6 - 0x14], 0x1
0000002C 7000 moveq.l D0, 0x00
0000002E 102E FFEC move.b D0, [A6 - 0x14]
00000032 3F00 move.w -[A7], D0
00000034 A888 syscall TextFace
00000036 4247 clr.w D7
label00000038:
00000038 3007 move.w D0, D7
0000003A C1FC 0054 muls.w D0, 0x54 /* 'T' */
0000003E 0640 0030 addi.w D0, 0x30 /* '0' */
00000042 3F00 move.w -[A7], D0
00000044 3F3C 0053 move.w -[A7], 0x53 /* 'S' */
00000048 A893 syscall MoveTo
0000004A 486E FEEE pea.l [A6 - 0x112]
0000004E 206D FAD6 movea.l A0, [A5 - 0x52A]
00000052 2050 movea.l A0, [A0]
00000054 3007 move.w D0, D7
00000056 D040 add.w D0, D0
00000058 3F30 0000 move.w -[A7], [A0 + D0.w]
0000005C 4EAD 020A jsr [A5 + 0x20A /* export_61 */]
00000060 584F addq.w A7, 4
00000062 486E FEEE pea.l [A6 - 0x112]
00000066 A884 syscall DrawString
00000068 5247 addq.w D7, 1
0000006A 0C47 0004 cmpi.w D7, 0x4
0000006E 6FC8 ble -0x36 /* 00000038 */
00000070 6006 bra +0x8 /* 00000078 */
label00000072:
00000072 0640 F826 addi.w D0, 0xF826
00000076 67A8 beq -0x56 /* 00000020 */
label00000078:
00000078 2E1F move.l D7, [A7]+
0000007A 4E5E unlink A6
0000007C 205F movea.l A0, [A7]+
0000007E 4FEF 000A lea.l A7, [A7 + 0xA]
00000082 4ED0 jmp [A0]
fn00000084:
00000084 4E56 FEC6 link A6, -0x013A
00000088 48E7 0F38 movem.l -[A7], D4,D5,D6,D7,A2,A3,A4
0000008C 3C2E 000E move.w D6, [A6 + 0xE]
00000090 3A2E 000C move.w D5, [A6 + 0xC]
00000094 206D FCE2 movea.l A0, [A5 - 0x31E]
00000098 2F10 move.l -[A7], [A0]
0000009A A851 syscall SetCursor
0000009C 2F2D F8AE move.l -[A7], [A5 - 0x752]
000000A0 4227 clr.b -[A7]
000000A2 A91C syscall HiliteWindow
000000A4 594F subq.w A7, 4
000000A6 3F3C 03F0 move.w -[A7], 0x3F0
000000AA 42A7 clr.l -[A7]
000000AC 70FF moveq.l D0, 0xFFFFFFFF
000000AE 2F00 move.l -[A7], D0
000000B0 A97C syscall GetNewDialog
000000B2 245F movea.l A2, [A7]+
000000B4 2F0A move.l -[A7], A2
000000B6 A981 syscall DrawDialog
000000B8 594F subq.w A7, 4
000000BA 7078 moveq.l D0, 0x78
000000BC 2F00 move.l -[A7], D0
000000BE 4EAD 00EA jsr [A5 + 0xEA /* export_25 */]
000000C2 285F movea.l A4, [A7]+
000000C4 554F subq.w A7, 2
000000C6 4EAD 0202 jsr [A5 + 0x202 /* export_60 */]
000000CA 101F move.b D0, [A7]+
000000CC 5300 subq.b D0, 1
000000CE 6700 0138 beq +0x13A /* 00000208 */
000000D2 4EAD 01F2 jsr [A5 + 0x1F2 /* export_58 */]
000000D6 2F0C move.l -[A7], A4
000000D8 4EAD 01D2 jsr [A5 + 0x1D2 /* export_54 */]
000000DC 554F subq.w A7, 2
000000DE 2F0C move.l -[A7], A4
000000E0 4EAD 01DA jsr [A5 + 0x1DA /* export_55 */]
000000E4 181F move.b D4, [A7]+
000000E6 594F subq.w A7, 4
000000E8 2F0C move.l -[A7], A4
000000EA 42A7 clr.l -[A7]
000000EC 42A7 clr.l -[A7]
000000EE 4EAD 01B2 jsr [A5 + 0x1B2 /* export_50 */]
000000F2 265F movea.l A3, [A7]+
000000F4 3F3C 0003 move.w -[A7], 0x3
000000F8 A887 syscall TextFont
000000FA 3E06 move.w D7, D6
label000000FC:
000000FC 554F subq.w A7, 2
000000FE 4EAD 01EA jsr [A5 + 0x1EA /* export_57 */]
00000102 4A5F tst.w [A7]+
00000104 6600 00BE bne +0xC0 /* 000001C4 */
00000108 2F0B move.l -[A7], A3
0000010A 42A7 clr.l -[A7]
0000010C 4EAD 01C2 jsr [A5 + 0x1C2 /* export_52 */]
00000110 554F subq.w A7, 2
00000112 4EAD 01EA jsr [A5 + 0x1EA /* export_57 */]
00000116 4A5F tst.w [A7]+
00000118 6600 00A4 bne +0xA6 /* 000001BE */
label0000011C:
0000011C 594F subq.w A7, 4
0000011E 3F07 move.w -[A7], D7
00000120 A9BC syscall GetPicture
00000122 3007 move.w D0, D7
00000124 9046 sub.w D0, D6
00000126 48C0 ext.l D0
00000128 81FC 0002 divs.w D0, 0x2
0000012C 4840 swap.w D0
0000012E C1FC 0154 muls.w D0, 0x154
00000132 3F00 move.w -[A7], D0
00000134 2F2E 0008 move.l -[A7], [A6 + 0x8]
00000138 4EBA FEC6 jsr [PC - 0x13A /* 00000000 */]
0000013C 3007 move.w D0, D7
0000013E 9046 sub.w D0, D6
00000140 48C0 ext.l D0
00000142 81FC 0002 divs.w D0, 0x2
00000146 4840 swap.w D0
00000148 5340 subq.w D0, 1
0000014A 57C0 seq D0
0000014C BE45 cmp.w D7, D5
0000014E 57C1 seq D1
00000150 8001 or.b D0, D1
00000152 674E beq +0x50 /* 000001A2 */
00000154 3F3C 000A move.w -[A7], 0xA /* '\n' */
00000158 A88A syscall TextSize
0000015A 1D7C 0001 FFC4 move.b [A6 - 0x3C], 0x1
00000160 7000 moveq.l D0, 0x00
00000162 102E FFC4 move.b D0, [A6 - 0x3C]
00000166 3F00 move.w -[A7], D0
00000168 A888 syscall TextFace
0000016A 3F3C 00C8 move.w -[A7], 0xC8
0000016E 3007 move.w D0, D7
00000170 9046 sub.w D0, D6
00000172 48C0 ext.l D0
00000174 81FC 0002 divs.w D0, 0x2
00000178 4840 swap.w D0
0000017A C1FC 0154 muls.w D0, 0x154
0000017E 0640 0136 addi.w D0, 0x136
00000182 3F00 move.w -[A7], D0
00000184 A893 syscall MoveTo
00000186 486E FEC6 pea.l [A6 - 0x13A]
0000018A 487A 00B6 pea.l [PC + 0xB6 /* 00000242, value 0x13537061, pstring "Spacestation Pheta " */]
0000018E 487A 009E pea.l [PC + 0x9E /* 0000022E, value 0x12A93139 */]
00000192 3F3C 0002 move.w -[A7], 0x2
00000196 4EAD 0032 jsr [A5 + 0x32 /* export_2 */]
0000019A 584F addq.w A7, 4
0000019C 486E FEC6 pea.l [A6 - 0x13A]
000001A0 A884 syscall DrawString
label000001A2:
000001A2 5247 addq.w D7, 1
000001A4 3007 move.w D0, D7
000001A6 9046 sub.w D0, D6
000001A8 48C0 ext.l D0
000001AA 81FC 0002 divs.w D0, 0x2
000001AE 4840 swap.w D0
000001B0 4A40 tst.w D0
000001B2 57C0 seq D0
000001B4 BE45 cmp.w D7, D5
000001B6 5EC1 sgt D1
000001B8 8001 or.b D0, D1
000001BA 6700 FF60 beq -0x9E /* 0000011C */
label000001BE:
000001BE 2F0B move.l -[A7], A3
000001C0 4EAD 01CA jsr [A5 + 0x1CA /* export_53 */]
label000001C4:
000001C4 BE45 cmp.w D7, D5
000001C6 6F00 FF34 ble -0xCA /* 000000FC */
000001CA 2F0B move.l -[A7], A3
000001CC 4EAD 01BA jsr [A5 + 0x1BA /* export_51 */]
000001D0 554F subq.w A7, 2
000001D2 4EAD 01EA jsr [A5 + 0x1EA /* export_57 */]
000001D6 4A5F tst.w [A7]+
000001D8 57C0 seq D0
000001DA 2054 movea.l A0, [A4]
000001DC 1228 0044 move.b D1, [A0 + 0x44]
000001E0 4881 ext.w D1
000001E2 5341 subq.w D1, 1
000001E4 57C1 seq D1
000001E6 C001 and.b D0, D1
000001E8 6710 beq +0x12 /* 000001FA */
000001EA 2F0C move.l -[A7], A4
000001EC 42A7 clr.l -[A7]
000001EE 42A7 clr.l -[A7]
000001F0 42A7 clr.l -[A7]
000001F2 486E FFCC pea.l [A6 - 0x34]
000001F6 4EAD 01E2 jsr [A5 + 0x1E2 /* export_56 */]
label000001FA:
000001FA 4EAD 0212 jsr [A5 + 0x212 /* export_62 */]
000001FE 2F0C move.l -[A7], A4
00000200 4EAD 00F2 jsr [A5 + 0xF2 /* export_26 */]
00000204 4EAD 01FA jsr [A5 + 0x1FA /* export_59 */]
label00000208:
00000208 2F2D F8AE move.l -[A7], [A5 - 0x752]
0000020C A873 syscall SetPort
0000020E 2F0A move.l -[A7], A2
00000210 A983 syscall DisposeDialog
00000212 2F2D F8AE move.l -[A7], [A5 - 0x752]
00000216 1F3C 0001 move.b -[A7], 0x1
0000021A A91C syscall HiliteWindow
0000021C 486D FF5E pea.l [A5 - 0xA2]
00000220 A851 syscall SetCursor
00000222 4CDF 1CF0 movem.l D4,D5,D6,D7,A2,A3,A4, [A7]+
00000226 4E5E unlink A6
00000228 205F movea.l A0, [A7]+
0000022A 504F addq.w A7, 8
0000022C 4ED0 jmp [A0]
0000022E 12A9 3139 move.b [A1], [A1 + 0x3139]
00000232 3839 2054 2654 move.w D4, [0x20542654]
00000238 2053 movea.l A0, [A3]
0000023A 6F66 ble +0x68 /* 000002A2 */
0000023C 7477 moveq.l D2, 0x77
0000023E 6172 bsr +0x74 /* 000002B2 */
00000240 6500 1353 bcs +0x1355 /* 00001595 */
00000244 7061 moveq.l D0, 0x61
00000246 6365 bls +0x67 /* 000002AD */
00000248 7374 moveq.l D1, 0x74
0000024A 6174 bsr +0x76 /* 000002C0 */
0000024C 696F bvs +0x71 /* 000002BD */
0000024E 6E20 bgt +0x22 /* 00000270 */
00000250 5068 6574 addq.w [A0 + 0x6574], 8
00000254 6120 bsr +0x22 /* 00000276 */
export_102:
00000256 4E56 FFA4 link A6, -0x005C
0000025A 48E7 1F38 movem.l -[A7], D3,D4,D5,D6,D7,A2,A3,A4
0000025E 3C2E 0008 move.w D6, [A6 + 0x8]
00000262 206D F8AE movea.l A0, [A5 - 0x752]
00000266 4868 0010 pea.l [A0 + 0x10]
0000026A A8A3 syscall EraseRect
0000026C 486E FFE8 pea.l [A6 - 0x18]
label00000270:
00000270 3F3C 000F move.w -[A7], 0xF
00000274 3F3C 0129 move.w -[A7], 0x129
// begin alternate branch 00000276-00000280
fn00000276:
00000276 0129 3F3C btst [A1 + 0x3F3C], D0
0000027A 0051 3F3C ori.w [A1], 0x3F3C /* '?<' */
0000027E 013D btst <<invalid special address>>, D0
// end alternate branch 00000276-00000280
fn00000276: // (misaligned)
00000278 3F3C 0051 move.w -[A7], 0x51 /* 'Q' */
0000027C 3F3C 013D move.w -[A7], 0x13D
00000280 A8A7 syscall SetRect
00000282 594F subq.w A7, 4
00000284 2F2D F8AE move.l -[A7], [A5 - 0x752]
00000288 486E FFE8 pea.l [A6 - 0x18]
0000028C 487A 0346 pea.l [PC + 0x346 /* 000005D4, value 0x44E6578, pstring "Next" */]
00000290 1F3C 0001 move.b -[A7], 0x1
00000294 4267 clr.w -[A7]
00000296 4267 clr.w -[A7]
00000298 4267 clr.w -[A7]
0000029A 4267 clr.w -[A7]
0000029C 42A7 clr.l -[A7]
0000029E A954 syscall NewControl
000002A0 285F movea.l A4, [A7]+
label000002A2:
000002A2 486E FFE8 pea.l [A6 - 0x18]
000002A6 3F3C 005A move.w -[A7], 0x5A /* 'Z' */
000002AA 3F3C 0129 move.w -[A7], 0x129
000002AE 3F3C 009C move.w -[A7], 0x9C
fn000002B2:
000002B2 3F3C 013D move.w -[A7], 0x13D
000002B6 A8A7 syscall SetRect
000002B8 594F subq.w A7, 4
000002BA 2F2D F8AE move.l -[A7], [A5 - 0x752]
000002BE 486E FFE8 pea.l [A6 - 0x18]
// begin alternate branch 000002C0-000002C2
fn000002C0:
000002C0 FFE8 .invalid <<F/7/7>>
// end alternate branch 000002C0-000002C2
fn000002C0: // (misaligned)
000002C2 487A 0306 pea.l [PC + 0x306 /* 000005CA, value 0x8507265, pstring "Previous" */]
000002C6 1F3C 0001 move.b -[A7], 0x1
000002CA 4267 clr.w -[A7]
000002CC 4267 clr.w -[A7]
000002CE 4267 clr.w -[A7]
000002D0 4267 clr.w -[A7]
000002D2 7001 moveq.l D0, 0x01
000002D4 2F00 move.l -[A7], D0
000002D6 A954 syscall NewControl
000002D8 265F movea.l A3, [A7]+
000002DA 486E FFE8 pea.l [A6 - 0x18]
000002DE 3F3C 0124 move.w -[A7], 0x124
000002E2 3F3C 0129 move.w -[A7], 0x129
000002E6 3F3C 0166 move.w -[A7], 0x166
000002EA 3F3C 013D move.w -[A7], 0x13D
000002EE A8A7 syscall SetRect
000002F0 594F subq.w A7, 4
000002F2 2F2D F8AE move.l -[A7], [A5 - 0x752]
000002F6 486E FFE8 pea.l [A6 - 0x18]
000002FA 487A 02C8 pea.l [PC + 0x2C8 /* 000005C4, value 0x5507269, pstring "Print" */]
000002FE 1F3C 0001 move.b -[A7], 0x1
00000302 4267 clr.w -[A7]
00000304 4267 clr.w -[A7]
00000306 4267 clr.w -[A7]
00000308 4267 clr.w -[A7]
0000030A 7802 moveq.l D4, 0x02
0000030C 2F04 move.l -[A7], D4
0000030E A954 syscall NewControl
00000310 281F move.l D4, [A7]+
00000312 486E FFE8 pea.l [A6 - 0x18]
00000316 3F3C 016F move.w -[A7], 0x16F
0000031A 3F3C 0129 move.w -[A7], 0x129
0000031E 3F3C 01B1 move.w -[A7], 0x1B1
00000322 3F3C 013D move.w -[A7], 0x13D
00000326 A8A7 syscall SetRect
00000328 594F subq.w A7, 4
0000032A 2F2D F8AE move.l -[A7], [A5 - 0x752]
0000032E 486E FFE8 pea.l [A6 - 0x18]
00000332 487A 0286 pea.l [PC + 0x286 /* 000005BA, value 0x9507269 '\tPri', pstring "Print All" */]
00000336 1F3C 0001 move.b -[A7], 0x1
0000033A 4267 clr.w -[A7]
0000033C 4267 clr.w -[A7]
0000033E 4267 clr.w -[A7]
00000340 4267 clr.w -[A7]
00000342 7A03 moveq.l D5, 0x03
00000344 2F05 move.l -[A7], D5
00000346 A954 syscall NewControl
00000348 2A1F move.l D5, [A7]+
0000034A 486E FFE8 pea.l [A6 - 0x18]
0000034E 3F3C 00BA move.w -[A7], 0xBA
00000352 3F3C 0129 move.w -[A7], 0x129
00000356 3F3C 0106 move.w -[A7], 0x106
0000035A 3F3C 013D move.w -[A7], 0x13D
0000035E A8A7 syscall SetRect
00000360 594F subq.w A7, 4
00000362 2F2D F8AE move.l -[A7], [A5 - 0x752]
00000366 486E FFE8 pea.l [A6 - 0x18]
0000036A 487A 0248 pea.l [PC + 0x248 /* 000005B4, value 0x4446F6E, pstring "Done" */]
0000036E 1F3C 0001 move.b -[A7], 0x1
00000372 4267 clr.w -[A7]
00000374 4267 clr.w -[A7]
00000376 4267 clr.w -[A7]
00000378 4267 clr.w -[A7]
0000037A 7004 moveq.l D0, 0x04
0000037C 2F00 move.l -[A7], D0
0000037E A954 syscall NewControl
00000380 245F movea.l A2, [A7]+
00000382 486E FFE8 pea.l [A6 - 0x18]
00000386 4267 clr.w -[A7]
00000388 4267 clr.w -[A7]
0000038A 4267 clr.w -[A7]
0000038C 4267 clr.w -[A7]
0000038E A8A7 syscall SetRect
00000390 594F subq.w A7, 4
00000392 42A7 clr.l -[A7]
00000394 486E FFE8 pea.l [A6 - 0x18]
00000398 487A 0218 pea.l [PC + 0x218 /* 000005B2, value 0x120444, cstring "" */]
0000039C 1F3C 0001 move.b -[A7], 0x1
000003A0 3F3C 0001 move.w -[A7], 0x1
000003A4 70FF moveq.l D0, 0xFFFFFFFF
000003A6 2F00 move.l -[A7], D0
000003A8 4227 clr.b -[A7]
000003AA 42A7 clr.l -[A7]
000003AC A913 syscall NewWindow
000003AE 2D5F FFB6 move.l [A6 - 0x4A], [A7]+
000003B2 2F2D F8AE move.l -[A7], [A5 - 0x752]
000003B6 1F3C 0001 move.b -[A7], 0x1
000003BA A91C syscall HiliteWindow
000003BC 486E FFE8 pea.l [A6 - 0x18]
000003C0 4267 clr.w -[A7]
000003C2 4267 clr.w -[A7]
000003C4 3F3C 01C0 move.w -[A7], 0x1C0
000003C8 3F3C 0126 move.w -[A7], 0x126
000003CC A8A7 syscall SetRect
label000003CE:
000003CE BC6E 000C cmp.w D6, [A6 + 0xC]
000003D2 660A bne +0xC /* 000003DE */
000003D4 2F0C move.l -[A7], A4
000003D6 3F3C 00FF move.w -[A7], 0xFF
000003DA A95D syscall HiliteControl
000003DC 6006 bra +0x8 /* 000003E4 */
label000003DE:
000003DE 2F0C move.l -[A7], A4
000003E0 4267 clr.w -[A7]
000003E2 A95D syscall HiliteControl
label000003E4:
000003E4 302E 000C move.w D0, [A6 + 0xC]
000003E8 B06E 000A cmp.w D0, [A6 + 0xA]
000003EC 660A bne +0xC /* 000003F8 */
000003EE 2F0B move.l -[A7], A3
000003F0 3F3C 00FF move.w -[A7], 0xFF
000003F4 A95D syscall HiliteControl
000003F6 6006 bra +0x8 /* 000003FE */
label000003F8:
000003F8 2F0B move.l -[A7], A3
000003FA 4267 clr.w -[A7]
000003FC A95D syscall HiliteControl
label000003FE:
000003FE 486E FFE8 pea.l [A6 - 0x18]
00000402 A928 syscall InvalRect
00000404 2F2D F8AE move.l -[A7], [A5 - 0x752]
00000408 A922 syscall BeginUpdate
0000040A 486E FFE8 pea.l [A6 - 0x18]
0000040E A8A3 syscall EraseRect
00000410 594F subq.w A7, 4
00000412 3F2E 000C move.w -[A7], [A6 + 0xC]
00000416 A9BC syscall GetPicture
00000418 4267 clr.w -[A7]
0000041A 2F0E move.l -[A7], A6
0000041C 4EBA FBE2 jsr [PC - 0x41E /* 00000000 */]
00000420 2F2D F8AE move.l -[A7], [A5 - 0x752]
00000424 A969 syscall DrawControls
00000426 2F2D F8AE move.l -[A7], [A5 - 0x752]
0000042A A923 syscall EndUpdate
0000042C 4247 clr.w D7
0000042E 42AE FFBC clr.l [A6 - 0x44]
label00000432:
00000432 A9B4 syscall SystemTask
00000434 554F subq.w A7, 2
00000436 3F3C 0002 move.w -[A7], 0x2
0000043A 486E FFC4 pea.l [A6 - 0x3C]
0000043E A970 syscall GetNextEvent
00000440 4A1F tst.b [A7]+
00000442 6762 beq +0x64 /* 000004A6 */
00000444 554F subq.w A7, 2
00000446 2F2E FFCE move.l -[A7], [A6 - 0x32]
0000044A 486E FFC0 pea.l [A6 - 0x40]
0000044E A92C syscall FindWindow
00000450 0C5F 0003 cmpi.w [A7]+, 0x3
00000454 57C0 seq D0
00000456 4A00 tst.b D0
00000458 670C beq +0xE /* 00000466 */
0000045A 202E FFC0 move.l D0, [A6 - 0x40]
0000045E B0AD F8AE cmp.l D0, [A5 - 0x752]
00000462 57C0 seq D0
00000464 4A00 tst.b D0
label00000466:
00000466 6738 beq +0x3A /* 000004A0 */
00000468 3F3C 0004 move.w -[A7], 0x4
0000046C 4267 clr.w -[A7]
0000046E 201F move.l D0, [A7]+
00000470 A032 syscall FlushEvents
00000472 486E FFCE pea.l [A6 - 0x32]
00000476 A871 syscall GlobalToLocal
00000478 554F subq.w A7, 2
0000047A 2F2E FFCE move.l -[A7], [A6 - 0x32]
0000047E 2F2D F8AE move.l -[A7], [A5 - 0x752]
00000482 486E FFBC pea.l [A6 - 0x44]
00000486 A96C syscall FindControl
00000488 0C5F 000A cmpi.w [A7]+, 0xA /* '\n' */
0000048C 6618 bne +0x1A /* 000004A6 */
0000048E 554F subq.w A7, 2
00000490 2F2E FFBC move.l -[A7], [A6 - 0x44]
00000494 2F2E FFCE move.l -[A7], [A6 - 0x32]
00000498 42A7 clr.l -[A7]
0000049A A968 syscall TrackControl
0000049C 3E1F move.w D7, [A7]+
0000049E 6006 bra +0x8 /* 000004A6 */
label000004A0:
000004A0 3F3C 0001 move.w -[A7], 0x1
000004A4 A9C8 syscall SysBeep
label000004A6:
000004A6 554F subq.w A7, 2
000004A8 3F3C 0008 move.w -[A7], 0x8
000004AC 486E FFC4 pea.l [A6 - 0x3C]
000004B0 A970 syscall GetNextEvent
000004B2 101F move.b D0, [A7]+
000004B4 6722 beq +0x24 /* 000004D8 */
000004B6 202E FFC6 move.l D0, [A6 - 0x3A]
000004BA 0280 0000 00FF andi.l D0, 0xFF
000004C0 720D moveq.l D1, 0x0D
000004C2 B081 cmp.l D0, D1
000004C4 57C0 seq D0
000004C6 222E FFC6 move.l D1, [A6 - 0x3A]
000004CA 0281 0000 00FF andi.l D1, 0xFF
000004D0 5781 subq.l D1, 3
000004D2 57C1 seq D1
000004D4 8001 or.b D0, D1
000004D6 4400 neg.b D0
label000004D8:
000004D8 671C beq +0x1E /* 000004F6 */
000004DA BC6E 000C cmp.w D6, [A6 + 0xC]
000004DE 6706 beq +0x8 /* 000004E6 */
000004E0 2D4C FFBC move.l [A6 - 0x44], A4
000004E4 6004 bra +0x6 /* 000004EA */
label000004E6:
000004E6 2D4A FFBC move.l [A6 - 0x44], A2
label000004EA:
000004EA 2F2E FFBC move.l -[A7], [A6 - 0x44]
000004EE 3F3C 0001 move.w -[A7], 0x1
000004F2 A95D syscall HiliteControl
000004F4 7E0A moveq.l D7, 0x0A
label000004F6:
000004F6 0C47 000A cmpi.w D7, 0xA /* '\n' */
000004FA 57C0 seq D0
000004FC 2F00 move.l -[A7], D0
000004FE 554F subq.w A7, 2
00000500 3F3C 0040 move.w -[A7], 0x40 /* '@' */
00000504 486E FFC4 pea.l [A6 - 0x3C]
00000508 A970 syscall GetNextEvent
0000050A 121F move.b D1, [A7]+
0000050C 201F move.l D0, [A7]+
0000050E 4400 neg.b D0
00000510 8001 or.b D0, D1
00000512 6700 FF1E beq -0xE0 /* 00000432 */
00000516 202E FFBC move.l D0, [A6 - 0x44]
0000051A B08C cmp.l D0, A4
0000051C 660C bne +0xE /* 0000052A */
0000051E 302E 000C move.w D0, [A6 + 0xC]
00000522 5240 addq.w D0, 1
00000524 3D40 000C move.w [A6 + 0xC], D0
00000528 603C bra +0x3E /* 00000566 */
label0000052A:
0000052A 202E FFBC move.l D0, [A6 - 0x44]
0000052E B08B cmp.l D0, A3
00000530 660C bne +0xE /* 0000053E */
00000532 302E 000C move.w D0, [A6 + 0xC]
00000536 5340 subq.w D0, 1
00000538 3D40 000C move.w [A6 + 0xC], D0
0000053C 6028 bra +0x2A /* 00000566 */
label0000053E:
0000053E B8AE FFBC cmp.l D4, [A6 - 0x44]
00000542 6610 bne +0x12 /* 00000554 */
00000544 3F2E 000C move.w -[A7], [A6 + 0xC]
00000548 3F2E 000C move.w -[A7], [A6 + 0xC]
0000054C 2F0E move.l -[A7], A6
0000054E 4EBA FB34 jsr [PC - 0x4CC /* 00000084 */]
00000552 6012 bra +0x14 /* 00000566 */
label00000554:
00000554 BAAE FFBC cmp.l D5, [A6 - 0x44]
00000558 660C bne +0xE /* 00000566 */
0000055A 3F2E 000A move.w -[A7], [A6 + 0xA]
0000055E 3F06 move.w -[A7], D6
00000560 2F0E move.l -[A7], A6
00000562 4EBA FB20 jsr [PC - 0x4E0 /* 00000084 */]
label00000566:
00000566 202E FFBC move.l D0, [A6 - 0x44]
0000056A B08A cmp.l D0, A2
0000056C 6600 FE60 bne -0x19E /* 000003CE */
00000570 2F0C move.l -[A7], A4
00000572 A955 syscall DisposeControl
00000574 2F0B move.l -[A7], A3
00000576 A955 syscall DisposeControl
00000578 2F04 move.l -[A7], D4
0000057A A955 syscall DisposeControl
0000057C 2F05 move.l -[A7], D5
0000057E A955 syscall DisposeControl
00000580 2F0A move.l -[A7], A2
00000582 A955 syscall DisposeControl
00000584 2F2E FFB6 move.l -[A7], [A6 - 0x4A]
00000588 A914 syscall DisposeWindow
0000058A 554F subq.w A7, 2
0000058C 3F3C 0100 move.w -[A7], 0x100
00000590 486E FFC4 pea.l [A6 - 0x3C]
00000594 A970 syscall GetNextEvent
00000596 161F move.b D3, [A7]+
00000598 554F subq.w A7, 2
0000059A 3F3C 0100 move.w -[A7], 0x100
0000059E 486E FFC4 pea.l [A6 - 0x3C]
000005A2 A970 syscall GetNextEvent
000005A4 161F move.b D3, [A7]+
000005A6 4CDF 1CF8 movem.l D3,D4,D5,D6,D7,A2,A3,A4, [A7]+
000005AA 4E5E unlink A6
000005AC 205F movea.l A0, [A7]+
000005AE 5C4F addq.w A7, 6
000005B0 4ED0 jmp [A0]
000005B2 0012 0444 ori.b [A2], 0x44 /* 'D' */
000005B6 6F6E ble +0x70 /* 00000626 */
000005B8 6512 bcs +0x14 /* 000005CC */
000005BA 0950 bchg [A0], D4
000005BC 7269 moveq.l D1, 0x69
000005BE 6E74 bgt +0x76 /* 00000634 */
000005C0 2041 movea.l A0, D1
000005C2 6C6C bge +0x6E /* 00000630 */
000005C4 0550 bchg [A0], D2
000005C6 7269 moveq.l D1, 0x69
000005C8 6E74 bgt +0x76 /* 0000063E */
000005CA 0850 7265 bchg.b [A0], 0x65 /* 'e' */
// begin alternate branch 000005CC-000005CE
label000005CC:
000005CC 7265 moveq.l D1, 0x65
// end alternate branch 000005CC-000005CE
label000005CC: // (misaligned)
000005CE 7669 moveq.l D3, 0x69
000005D0 6F75 ble +0x77 /* 00000647 */
000005D2 7312 moveq.l D1, 0x12
000005D4 044E 6578 subi.w A6, 0x6578 /* 'ex' */
000005D8 7412 moveq.l D2, 0x12